home *** CD-ROM | disk | FTP | other *** search
/ PC Format (UK) 124 / pcfcd124-a.iso / PCF Shareware.dxr / 00001.ls next >
Encoding:
Text File  |  2001-05-22  |  1.7 KB  |  83 lines
  1. on startMovie
  2.   set the rect of sprite 5 to rect(49, 151, 438, 347)
  3.   sprite(5).visible = 1
  4. end
  5.  
  6. on gWhichScript
  7.   gLiteWhichButton()
  8. end
  9.  
  10. on gWhichScriptOff
  11.   gDimWhichButton()
  12. end
  13.  
  14. on gLiteButtons BlueBlock
  15.   cursor(280)
  16.   if sprite the currentSpriteNum intersects sprite(BlueBlock) then
  17.     set the member of sprite BlueBlock to "Bar on purple"
  18.     set the locV of sprite 50 to the locV of sprite BlueBlock
  19.   end if
  20. end
  21.  
  22. on gDimButtons BlueBlock
  23.   cursor(0)
  24.   if sprite the currentSpriteNum intersects sprite(BlueBlock) then
  25.     set the member of sprite BlueBlock to "Bar off"
  26.   end if
  27. end
  28.  
  29. on gHandsIn
  30.   set the locH of sprite 50 to the locH of sprite 50 + 6
  31. end
  32.  
  33. on gHandsOut
  34.   updateStage()
  35.   set the locH of sprite 50 to the locH of sprite 50 - 6
  36.   set the member of sprite 5 to "loading"
  37. end
  38.  
  39. on gResetHands
  40.   set the locH of sprite 50 to 462
  41. end
  42.  
  43. on gLiteWhichButton
  44.   gLiteButtons(10)
  45.   gLiteButtons(11)
  46.   gLiteButtons(12)
  47.   gLiteButtons(13)
  48.   gLiteButtons(14)
  49.   gLiteButtons(15)
  50.   gLiteButtons(16)
  51.   gLiteButtons(17)
  52.   gLiteButtons(18)
  53.   gLiteButtons(19)
  54. end
  55.  
  56. on gDimWhichButton
  57.   gDimButtons(10)
  58.   gDimButtons(11)
  59.   gDimButtons(12)
  60.   gDimButtons(13)
  61.   gDimButtons(14)
  62.   gDimButtons(15)
  63.   gDimButtons(16)
  64.   gDimButtons(17)
  65.   gDimButtons(18)
  66.   gDimButtons(19)
  67. end
  68.  
  69. on gChangeDetails
  70.   set the memberNum of sprite 5 to the memberNum of sprite the currentSpriteNum - 60
  71.   set the rect of sprite 5 to rect(49, 151, 438, 347)
  72.   if sprite(5).blend > 10 then
  73.     sprite(5).blend = 0
  74.   end if
  75.   if sprite(6).blend > 10 then
  76.     sprite(6).blend = 0
  77.   end if
  78.   set the memberNum of sprite 4 to the memberNum of sprite the currentSpriteNum - 40
  79.   set the memberNum of sprite 6 to the memberNum of sprite the currentSpriteNum - 20
  80.   set the locH of sprite 6 to 400
  81.   updateStage()
  82. end
  83.